<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in</name>
<id>-1</id>
<cardCount>498</cardCount>
<cardID>22963</cardID>
<listID>108580</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>512</width>
<height>342</height>
</cardSize>
<script>on LayABigOneglobal MasterLinkList,LinkType,TextToLink,LinkSpecs,LinkFieldglobal LinkChunk,LinkCard,LinkStack,LinkStatusset lockMessages to truerepeat with c=267 to the number of cdsgo cd crepeat with i=the number of cd btns down to 1put script of cd btn i into bigHolderif "global returnTo" is in bigholder thenput line 7 of bigHolder into ParseThis -- parse for cd id and stackput word 5 of parseThis into TargCardIdif the number of words in parseThis>5 thendelete word 1 to 7 of parseThisput parseThis into TargStackNamedelete last char of TargStackNamedelete first char of TargStackNamedelete first char of TargStackNamedelete first char of TargStackNameelse put short name of this stack into TargStackNameput short name of cd btn i into DeleteThisButtonfind string (short name of cd btn i) in fld MainTextput the foundChunkselect the foundChunkput the selectedChunk into LinkChunkput the selectedField into LinkFieldput the selectedText into TextToLinkput substitute(","," ",the selectedText) into TextToLinkput "TEXT" into LinkTypeset the textStyle of LinkChunk to Bold,Groupput substitute(",","|",short name of cd btn i) into TextToHiliteput (TargCardId)&"|"&TargStackName&"|"&TextToHilite into LinkSpecs --selectionput LinkType&","&TextToLink&"|"&(word 3 of id of this cd)&","&LinkSpecs&","&"Original 1.0 Link"&return after MasterLinkListput word 1 of short name of this stack&&"HyperTag‚Ñ¢" into fileNameopen file fileNamewrite the time&&the date&return&MasterLinkList to file fileNameclose file fileNamechoose "Button Tool"click at the loc of cd btn DeleteThisButtontype "X" with commandKeychoose "Browse Tool"end ifend repeatend repeatset lockMessages to falseend LayABigOne</script>
